home *** CD-ROM | disk | FTP | other *** search
/ Visual Basic 5 Developer's Kit / vb5 dev kit.iso / dev / desaware / stgtools / reg_demo / order.frm (.txt) < prev    next >
Encoding:
Visual Basic Form  |  1995-12-13  |  9.6 KB  |  295 lines
  1. VERSION 4.00
  2. Begin VB.Form OrderForm 
  3.    Appearance      =   0  'Flat
  4.    BackColor       =   &H80000004&
  5.    BorderStyle     =   3  'Fixed Dialog
  6.    Caption         =   "Ordering Information"
  7.    ClientHeight    =   4845
  8.    ClientLeft      =   1005
  9.    ClientTop       =   1710
  10.    ClientWidth     =   7665
  11.    ControlBox      =   0   'False
  12.    BeginProperty Font 
  13.       name            =   "MS Sans Serif"
  14.       charset         =   0
  15.       weight          =   700
  16.       size            =   8.25
  17.       underline       =   0   'False
  18.       italic          =   0   'False
  19.       strikethrough   =   0   'False
  20.    EndProperty
  21.    ForeColor       =   &H80000008&
  22.    Height          =   5310
  23.    Left            =   915
  24.    LinkMode        =   1  'Source
  25.    LinkTopic       =   "Form2"
  26.    MaxButton       =   0   'False
  27.    MinButton       =   0   'False
  28.    ScaleHeight     =   4845
  29.    ScaleWidth      =   7665
  30.    Top             =   1335
  31.    Width           =   7845
  32.    Begin VB.CommandButton Command1 
  33.       Appearance      =   0  'Flat
  34.       BackColor       =   &H80000005&
  35.       Caption         =   "Print"
  36.       Height          =   495
  37.       Left            =   4680
  38.       TabIndex        =   17
  39.       Top             =   3840
  40.       Width           =   1035
  41.    End
  42.    Begin VB.CommandButton Command2 
  43.       Appearance      =   0  'Flat
  44.       BackColor       =   &H80000005&
  45.       Caption         =   "Exit"
  46.       Height          =   495
  47.       Left            =   6360
  48.       TabIndex        =   18
  49.       Top             =   3840
  50.       Width           =   1035
  51.    End
  52.    Begin VB.Label Label2 
  53.       Appearance      =   0  'Flat
  54.       BackColor       =   &H80000005&
  55.       BackStyle       =   0  'Transparent
  56.       Caption         =   "Desaware is commited to providing top quality software at rock bottom prices."
  57.       ForeColor       =   &H00800000&
  58.       Height          =   195
  59.       Left            =   60
  60.       TabIndex        =   0
  61.       Top             =   60
  62.       Width           =   7575
  63.    End
  64.    Begin VB.Label Label3 
  65.       Appearance      =   0  'Flat
  66.       BackColor       =   &H80000005&
  67.       BackStyle       =   0  'Transparent
  68.       Caption         =   $"ORDER.frx":0000
  69.       ForeColor       =   &H80000008&
  70.       Height          =   855
  71.       Left            =   120
  72.       TabIndex        =   1
  73.       Top             =   360
  74.       Width           =   7515
  75.    End
  76.    Begin VB.Label Label4 
  77.       Appearance      =   0  'Flat
  78.       BackColor       =   &H80000005&
  79.       BackStyle       =   0  'Transparent
  80.       Caption         =   "All this for only $129 + $5 shipping && handling."
  81.       BeginProperty Font 
  82.          name            =   "MS Sans Serif"
  83.          charset         =   0
  84.          weight          =   700
  85.          size            =   9.75
  86.          underline       =   -1  'True
  87.          italic          =   0   'False
  88.          strikethrough   =   0   'False
  89.       EndProperty
  90.       ForeColor       =   &H80000008&
  91.       Height          =   255
  92.       Left            =   60
  93.       TabIndex        =   3
  94.       Top             =   1200
  95.       Width           =   7395
  96.    End
  97.    Begin VB.Label Label1 
  98.       Appearance      =   0  'Flat
  99.       BackColor       =   &H80000005&
  100.       BackStyle       =   0  'Transparent
  101.       Caption         =   $"ORDER.frx":0116
  102.       ForeColor       =   &H80000008&
  103.       Height          =   435
  104.       Left            =   60
  105.       TabIndex        =   2
  106.       Top             =   1560
  107.       Width           =   7575
  108.    End
  109.    Begin VB.Label Label5 
  110.       Appearance      =   0  'Flat
  111.       BackColor       =   &H80000005&
  112.       BackStyle       =   0  'Transparent
  113.       Caption         =   "Name:___________________________________"
  114.       ForeColor       =   &H80000008&
  115.       Height          =   195
  116.       Left            =   60
  117.       TabIndex        =   4
  118.       Top             =   2220
  119.       Width           =   4275
  120.    End
  121.    Begin VB.Label Label13 
  122.       Appearance      =   0  'Flat
  123.       BackColor       =   &H80000005&
  124.       BackStyle       =   0  'Transparent
  125.       Caption         =   "Mail or fax order to:"
  126.       ForeColor       =   &H80000008&
  127.       Height          =   195
  128.       Left            =   4500
  129.       TabIndex        =   12
  130.       Top             =   2220
  131.       Width           =   2955
  132.    End
  133.    Begin VB.Label Label6 
  134.       Appearance      =   0  'Flat
  135.       BackColor       =   &H80000005&
  136.       BackStyle       =   0  'Transparent
  137.       Caption         =   "Company:________________________________"
  138.       ForeColor       =   &H80000008&
  139.       Height          =   195
  140.       Left            =   60
  141.       TabIndex        =   5
  142.       Top             =   2520
  143.       Width           =   4275
  144.    End
  145.    Begin VB.Label Label14 
  146.       Appearance      =   0  'Flat
  147.       BackColor       =   &H80000005&
  148.       BackStyle       =   0  'Transparent
  149.       Caption         =   "Desaware"
  150.       BeginProperty Font 
  151.          name            =   "MS Sans Serif"
  152.          charset         =   0
  153.          weight          =   700
  154.          size            =   12
  155.          underline       =   0   'False
  156.          italic          =   0   'False
  157.          strikethrough   =   0   'False
  158.       EndProperty
  159.       ForeColor       =   &H80000008&
  160.       Height          =   255
  161.       Left            =   4500
  162.       TabIndex        =   13
  163.       Top             =   2520
  164.       Width           =   3075
  165.    End
  166.    Begin VB.Label Label7 
  167.       Appearance      =   0  'Flat
  168.       BackColor       =   &H80000005&
  169.       BackStyle       =   0  'Transparent
  170.       Caption         =   "Address:_________________________________"
  171.       ForeColor       =   &H80000008&
  172.       Height          =   255
  173.       Left            =   60
  174.       TabIndex        =   6
  175.       Top             =   2820
  176.       Width           =   4275
  177.    End
  178.    Begin VB.Label Label15 
  179.       Appearance      =   0  'Flat
  180.       BackColor       =   &H80000005&
  181.       BackStyle       =   0  'Transparent
  182.       Caption         =   "1100 E. Hamilton Ave.  Suite 4"
  183.       ForeColor       =   &H80000008&
  184.       Height          =   195
  185.       Left            =   4500
  186.       TabIndex        =   14
  187.       Top             =   2820
  188.       Width           =   3075
  189.    End
  190.    Begin VB.Label Label16 
  191.       Appearance      =   0  'Flat
  192.       BackColor       =   &H80000005&
  193.       BackStyle       =   0  'Transparent
  194.       Caption         =   "Campbell, CA 95008"
  195.       ForeColor       =   &H80000008&
  196.       Height          =   195
  197.       Left            =   4500
  198.       TabIndex        =   15
  199.       Top             =   3060
  200.       Width           =   2955
  201.    End
  202.    Begin VB.Label Label8 
  203.       Appearance      =   0  'Flat
  204.       BackColor       =   &H80000005&
  205.       BackStyle       =   0  'Transparent
  206.       Caption         =   "City/State/Zip_____________________________"
  207.       ForeColor       =   &H80000008&
  208.       Height          =   255
  209.       Left            =   60
  210.       TabIndex        =   7
  211.       Top             =   3180
  212.       Width           =   4275
  213.    End
  214.    Begin VB.Label Label17 
  215.       Appearance      =   0  'Flat
  216.       BackColor       =   &H80000005&
  217.       BackStyle       =   0  'Transparent
  218.       Caption         =   "Fax: (408) 371-3530"
  219.       ForeColor       =   &H80000008&
  220.       Height          =   195
  221.       Left            =   4500
  222.       TabIndex        =   16
  223.       Top             =   3300
  224.       Width           =   2835
  225.    End
  226.    Begin VB.Label Label9 
  227.       Appearance      =   0  'Flat
  228.       BackColor       =   &H80000005&
  229.       BackStyle       =   0  'Transparent
  230.       Caption         =   "Phone:___________________________________"
  231.       ForeColor       =   &H80000008&
  232.       Height          =   255
  233.       Left            =   60
  234.       TabIndex        =   8
  235.       Top             =   3480
  236.       Width           =   4275
  237.    End
  238.    Begin VB.Label Label18 
  239.       Appearance      =   0  'Flat
  240.       BackColor       =   &H80000005&
  241.       BackStyle       =   0  'Transparent
  242.       Caption         =   "Voice inquries: (408) 377-4770"
  243.       ForeColor       =   &H80000008&
  244.       Height          =   195
  245.       Left            =   4500
  246.       TabIndex        =   19
  247.       Top             =   3540
  248.       Width           =   2775
  249.    End
  250.    Begin VB.Label Label10 
  251.       Appearance      =   0  'Flat
  252.       BackColor       =   &H80000005&
  253.       BackStyle       =   0  'Transparent
  254.       Caption         =   "Visa/Mastercard___________________________"
  255.       ForeColor       =   &H80000008&
  256.       Height          =   255
  257.       Left            =   60
  258.       TabIndex        =   9
  259.       Top             =   3780
  260.       Width           =   4275
  261.    End
  262.    Begin VB.Label Label11 
  263.       Appearance      =   0  'Flat
  264.       BackColor       =   &H80000005&
  265.       BackStyle       =   0  'Transparent
  266.       Caption         =   "Expiration:_____  Signature_________________"
  267.       ForeColor       =   &H80000008&
  268.       Height          =   255
  269.       Left            =   60
  270.       TabIndex        =   10
  271.       Top             =   4080
  272.       Width           =   4275
  273.    End
  274.    Begin VB.Label Label12 
  275.       Appearance      =   0  'Flat
  276.       BackColor       =   &H80000005&
  277.       BackStyle       =   0  'Transparent
  278.       Caption         =   $"ORDER.frx":01C0
  279.       ForeColor       =   &H80000008&
  280.       Height          =   435
  281.       Left            =   60
  282.       TabIndex        =   11
  283.       Top             =   4380
  284.       Width           =   7635
  285.    End
  286. Attribute VB_Name = "OrderForm"
  287. Attribute VB_Creatable = False
  288. Attribute VB_Exposed = False
  289. Private Sub Command1_Click()
  290.     OrderForm.PrintForm
  291. End Sub
  292. Private Sub Command2_Click()
  293.     Unload OrderForm
  294. End Sub
  295.